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# include < raven /diagnostic . h> 
namespace mp { 

// Port definitions 



const 


int 


AIN = 0; 




const 


int 


AOUT = 1; 




const 


int 


BIN = 2; 




const 


int 


BOUT = 3; 




const 


int 


CIN = 4; 




const 


int 


COUT = 5; 




const 


int 


DIN = 6; 




const 


int 


DOUT - 7; 




const 


int 


ASTALL = 


8; 


const 


int 


BSTALL = 


9; 


const 


int 


CSTALL = 


10; 


const 


int 


DSTALL = 


11; 


const 


int 


MISCIN = 


12; 


const 


int 


MISCOUT = 


■■ 13; 


const 


int 


RST = 14; 





// Command definitions 
const int PUT = 0x0; 
const int GET = 0x1; 
const int ERROR = Oxf; 



// Register definitions 
const int LUT = 0x0000; 
co nst int MISCIN = 0x1000; 
const int MISCOUT = 0x1004; 
const int LOCK = 0x2000; 

// Define a 32 bit register with error flag, 
struct flit : public raven: :reg<31, 0> { 
raven :: reg<0 , 0 > err; 

} ; 
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// Define a message, include all possible fields, 
struct msg { 

raven : : reg<7 , 0> dest ; 
raven : : reg<7 , 0> src ; 
raven : : reg<3 , 0> cmd; 
raven : : reg<3 , 0> mask; 
raven :: reg<7 , 0> id; 
raven : : reg<0 , 0> err; 
flit addr; 

raven: : vector<f lit> data; 
int vc; 
msg () { } 

msg (cost raven :: bundle & other); 
operator raven : : anybundle ( ) ; 

}; 

// Define port encoding to accept a node and a location, 
struct port { 
int node, loc; 

port (int p) : node (p >> 8), loc (p & Oxff) {} 
port (int n, int 1) : node (n) , loc (1) {} 

operator int() { return (node << 8) | (loc & Oxff); } 

}; 

// Make all kernel constructs visible, 
using namespace raven; 

} 

// Enable diagnostic line numbering. 
#include <raven/lines . h> 
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} 

// Decode data flits, if any. 
for (int i = w; i < x.sizeO; i + +) { 
data [i- w] = x [i] (31,0) ; 

data[i- w] .err = x[i] (32) ~ parity (x[i] (31,0) ) ; 

} 



mp : : msg : : operator raven : : bundle ( ) 
{ 

raven :: bundle<32 , 0> x; 

// Encode head flit, 
x [0] (31,24) = dest; 
x [0] (23,16) = src; 
x [0] (15, 12) = crad; 
x [0] (11, 8) = mask; 
x[0] (7, 0) = id; 

x[0] (32) = err " parity (x [ 0 ]) ; 

err = (x[0](32) != parity (x [ 0 ]( 31 , 0 ))) ; 

vc = x . vc ; 

// Encode address flit for request messages. 

int w = 1; 

if (vc == 0) { 

x [w] (31, 0) = addr; 

x [w] (32) = err " parity (x [w] (31,0)); 
w++ ; 

} 

// Encode data flits, if any. 
for (int i = 0; i < data. size (); i++) { 
x[i + w] (31,0) = data[i]; 

x [i + w] (32) = err A parity (x [i] (31,0)); 

} 
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